home *** CD-ROM | disk | FTP | other *** search
/ Warrior's Inn 13 / Warrior's Inn 13 (Disk 1 of 2).adf / Progs / HQMM.lha / HQMM / Install_with_Installer < prev    next >
Encoding:
Text File  |  1994-04-05  |  2.5 KB  |  91 lines
  1.  
  2. ;Install script for HeroQuest MapMaker. Copyright © 1993 Camiel Rouweler.
  3. ;$VER: Install_HQMM 1.04 (05-nov-1993)
  4.  
  5. (welcome
  6.    "Welcome to the HQMM installer\n"
  7. )
  8.  
  9. (message
  10.    "This utility will install HQMM to your system.\n"
  11.    "If you have an older version of HQMM installed it will be overwritten "
  12.    "when you install HQMM to the same directory as the older version.\n"
  13.    "Also, during the installation, a font will be copied into your FONTS: "
  14.    "drawer. This is required in order to let HQMM run.\n"
  15.    "About 120 kB free diskspace is required, plus 10 more for the font"
  16. )
  17.  
  18. (if (exists "Work:" (noreq))
  19.    (set @default-dir "Work:HQMM") ;then clause
  20.    (set @default-dir "SYS:HQMM")  ;else clause
  21. )
  22.  
  23.  
  24. (set destdir
  25.    (askdir
  26.       (prompt "select a directory where you want HQMM installed to.")
  27.       (help @askdir-help)
  28.       (default @default-dir)
  29.       (newpath)
  30.    )
  31. )
  32.  
  33. (set @default-dest destdir)
  34.  
  35. (if (NOT (exists destdir (noreq)))
  36.    (makedir destdir
  37.       (prompt "I will now create the directory " destdir)
  38.       (help @makedir-help)
  39.       (infos)
  40.    )
  41. )
  42.  
  43. (copyfiles
  44.    (prompt "Select files to install" destdir)
  45.    (help "HQMM\nThis is the executable file.\n\n"
  46.          "StoryPaper\nThis is an IFF file that is used for printing the story. "
  47.          "This one is required if you want to print new missions.\n\n"
  48.          "HQMM.guide\nThis is the documentation file in which is explained how "
  49.          "to use HQMM. To read this file, you need the AmigaGuide utility.\n\n"
  50.          "HQMM.example\nThis is an example of a mission for HQMM.\n\n"
  51.          "General help:\n"
  52.          @copylib-help)
  53.    (source "")
  54.    (dest destdir)
  55.    (choices "HQMM" "StoryPaper" "HQMM.guide" "HQMM_example")
  56.    (infos)
  57.    (confirm)
  58. )
  59.  
  60. (if (NOT (exists "FONTS:heroquest.font" (noreq)))
  61.    (
  62.       (message
  63.          "I will now create a new directory in your FONTS: drawer to "
  64.          "store the HQMM font."
  65.          (help "This font is required by HQMM in order to run.")
  66.       )
  67.       (copyfiles
  68.          (prompt "OK to copy HQMM font to FONTS:heroquest?")
  69.          (help @copyfiles-help)
  70.          (source "fonts")
  71.          (dest "FONTS:")
  72.          (choices "heroquest")
  73.          (fonts)
  74.          (confirm)
  75.       )
  76.    )
  77. )
  78.  
  79. (if (OR (NOT (exists "FONTS:Times/18")) (NOT(exists "FONTS:Times/24")))
  80.    (message
  81.       "Warning: The font Times/18 or Times/24 is not installed in your "
  82.       "FONTS: drawer. HQMM needs these in order to run."
  83.       (help "Use the Commodore system installer utility to install these "
  84.             "fonts to your system.")
  85.    )
  86. )
  87.  
  88. (exit
  89.    "\n\nHave a nice day!"
  90. )
  91.